home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Just Call Me Internet
/
Just Call Me Internet.iso
/
prog
/
atari
/
m2
/
cat3src
/
cat
/
arcass.d
next >
Wrap
Text File
|
1997-10-26
|
588b
|
28 lines
DEFINITION MODULE ARCAss;
FROM SYSTEM IMPORT ADDRESS;
TYPE outProcType = PROCEDURE ( (* char : *) CHAR);
PROCEDURE SetTrap();
PROCEDURE RestoreTrap();
PROCEDURE TrapProc();
PROCEDURE SetCharAddress(adr : ADDRESS);
(* Adresse, an der Speicheradresse fr das auszugebende Zeichen *)
PROCEDURE SetNewProc(adr : ADDRESS);
(* Adresse der auszufhrenden Proc *)
PROCEDURE SetOutputProc (p: ADDRESS);
(* Setzt die Ausgabeprozedur fr die Ausgabeumlenkung
*)
PROCEDURE ClearOutputProc ();
(* Lscht eine ggf. gesetzte Ausgabeprozedur
*)
END ARCAss.